; * lisp/repeat.el (repeat-echo-message): Use `string-search`.

diff --git a/lisp/repeat.el b/lisp/repeat.el
index 054eacf8ec98beebabd4f0d248c3f163e91474a9..89488ddc98f8390e569f19588dbcea62586281b7 100644 (file)
--- a/lisp/repeat.el
+++ b/lisp/repeat.el
@@ -474,7 +474,7 @@ When Repeat mode is enabled, and the command symbol has the property named
         (if (current-message)
             (message "%s [%s]" (current-message) mess)
           (message mess)))
-    (when (string-match-p "Repeat with " (current-message))
+    (when (string-search "Repeat with " (current-message))
       (message nil))))
 
 (defvar repeat-echo-mode-line-string